home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus 1996 #6
/
Amiga Plus CD - 1996 - No. 06.iso
/
pd
/
daten
/
megabook
/
storage
/
sendemail
/
spot.mbrx
next >
Wrap
Text File
|
1996-06-27
|
819b
|
39 lines
/*
** Spot EMail sender for MegaBook 3
** By Tom Bampton
**
** © 1996 Eden Software
**
** This is the script run when the Send EMail option is selected from the
** Extras menu, please see the docs for creating your own script to use
** your EMail program.
*/
/*
Path to Spot, it's run if Spot isn't running
Change this to the path of your copy of Spot
*/
SpotPath = 'Dh1:Spot/Spot'
/*
The area name to post the EMail in. Change this to your EMail area.
*/
EMailArea = 'NET_44_44_44_14'
parse arg Address
/* Check if Spot is running, if not, run it */
if ~show('P', 'SPOT') then do
address command
'run >nil: ' SpotPath
/* Wait for the ARexx port */
do 5 while ~show('P', 'SPOT')
'sys:rexxc/waitforport SPOT'
end
end
address 'SPOT'
options results
gotoarea EMailArea
messages
write EMAILADDR Address